home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
science
/
sm32a.zip
/
LIBRARY
/
POLAPLOT.LI
< prev
next >
Wrap
Text File
|
1994-07-28
|
301b
|
7 lines
# polaplot(r,t) plot r=r(t) on polar plane
# e.g. polaplot(1,t) plots r=1 w.r.t. t
polaplot(r_,t_,tmin_,tmax_,rmin_,rmax_) := paraplot(r*cos(t),r*sin(t),t,tmin,tmax,rmin,rmax)
polaplot(r_,t_,tmin_,tmax_) := paraplot(r*cos(t),r*sin(t),t,tmin,tmax,-5,5)
polaplot(r_,t_) := polaplot(r, t,0,2*pi)